home *** CD-ROM | disk | FTP | other *** search
/ Shareware Grab Bag / Shareware Grab Bag.iso / 002 / formit.arc / FORMITDC.BAT < prev   
DOS Batch File  |  1984-09-25  |  3KB  |  78 lines
  1. echo off
  2. if not . == .%1 goto Parse
  3. echo This batch file prints the FORMIT manual. It requires DOS 2.0 or higher.
  4. :Instruct
  5. echo     
  6. echo You will have to restart it, and specify what type of equipment you have.
  7. echo     
  8. echo    If you have an  Epson  FX  printer, type  "%0 FX".
  9. echo     
  10. echo    If you KNOW your printer doesn't
  11. echo    understand a form feed (^L), type         "%0 TY".
  12. echo     
  13. echo    Otherwise, type                           "%0 ^L".
  14. echo     
  15. echo     
  16. echo If you have an MS-DOS machine that is very different from the IBM (BIOS
  17. echo non-compatible), add a " -M" after the printer specification.
  18. echo (For example, "%0 FX -M".)
  19. echo     
  20. goto Exit
  21. :Parse
  22. for %%f in (formit.com formit.doc) do if not exist %%f goto Fileless
  23. for %%p in (. .-m .-M) do if .%2 == %%p goto Test
  24. :Test
  25. for %%p in (.-m .-M) do if .%2 == %%p if not exist formit-m.com goto NoM
  26. for %%p in (FX fx Fx fX) do if %1 == %%p goto fx
  27. for %%p in (^L ^l) do if %1 == %%p goto ^L
  28. for %%p in (TY ty Ty tY) do if %1 == %%p goto ty
  29. echo Bad parameter:
  30. goto Instruct
  31. :fx
  32. echo This will take from about two minutes with a RAM disk, to about five
  33. echo minutes with a floppy disk.
  34. echo     
  35. pause
  36. Formit%2 Formit.doc
  37. goto Check
  38. :^L
  39. echo This will take from about two minutes with a RAM disk, to about five
  40. echo minutes with a floppy disk.
  41. echo     
  42. pause
  43. Formit%2 Formit.doc;.ff
  44. goto Check
  45. :TY
  46. echo This will take from about two minutes with a RAM disk, to about five
  47. echo minutes with a floppy disk.
  48. echo     
  49. pause
  50. Formit%2 Formit.doc;.tt
  51. :Check
  52. if ErrorLevel 1 goto Print
  53. echo     
  54. echo  The file did not format correctly.  If it is not because the disk or
  55. echo  directory is full, there may have been some error in transmission.
  56. goto Exit
  57. :Print
  58. echo     
  59. echo The manual is 30 pages long.  Hit break if you don't want to print it now.
  60. echo     
  61. pause
  62. copy Formit.Prn prn
  63. goto Exit
  64. :Fileless
  65. echo     
  66. echo You cannot print the documentation without FORMIT.COM and FORMIT.DOC on
  67. echo the default drive.
  68. goto Exit
  69. :NoM
  70. echo     
  71. echo You cannot use the -M option without the file FORMIT-M.COM on the default
  72. echo dive. If you do not have it, try again without the -M option.
  73. echo !  If your computer is not an IBM, you may »need« FORMIT-M, and running
  74. echo !  FORMIT may hang your system. Be sure you have physical copies (ie, not
  75. echo !  on a RAM disk) before making the experiment.
  76. :Exit
  77. echo     
  78.